function [Mom,MPC,WI]=SubFun_SS2Mom(PP,SS)
if isempty(SS)
    Mom     =   NaN(2,1);
    WI      =   [];
    MPC     =   [];
else
    WI      =   SubFun_Stat_WealthIncome(PP,SS);
    MPC     =   SubFun_Stat_MPC(PP,SS);
    Mom     =   [WI.WealthIncomeRatio.Quant(5);MPC.Quant(4)];
end
% Result.MPC.Avg ...
% Result.WI.Wealth.Frac_Neg;...
% Result.WI.Wealth.Median/Result.WI.Income.Median;...
% Result.WI.WealthIncomeRatio.Share_HtM ...